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1 . BACKGROUND 


SPATL is an analysis program in the Accuracy Assessment Software System which 
makes comparisons between ground truth information and dot labeling for an 
individual segment. (For information on this program see "As-Built Design 
Specification for PDP 11/45 Accuracy Assessment System Using Disk Data File," 
Job Order 71-695, TIRF 77-0048, LEC-11881.) Some of the information produced 
by this program is of interest for areas greater than a single segment. In 
order to facilitate the aggregation cf this information, SPATL was modified 
to produce a disk output file containing the necessary information about each 
segment. 
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2. GENERAL DESCRIPTION 


The modifications to SPATE that produce the disk output file do not change 
the operation of the program. The data needed for the output file are stored 
in arrays and then written to a disk file when processing is complete. The 
line printer output from the program was modified to include the contents of 
the output file. 

The output file is named SPATLOUT.OUT. It is created in the UIC where the 
task is located. The output file is an unformatted, sequential access file. 
The contents of the file are described in appendix A. Records 2, 3, 4, and 5 

are two-dimensional arrays. The second subscript in records 2 and 3 is a 

running index for the transformations. In record 4, the second subscript is 
a running index for crop codes. The second subscript in record 5 is a running 
index for mixed pixel AI dots. 

To access the output data file, the following statement should be used: 

OPEN(UNIT=LUN,NAME=FLNM,TYPE= ' OLD ' ,ACCESS= ' SEQUENTIAL ' , 

♦ F0RM= 'UNFORMATTED' ,CARRI AGE C0NTR0L='N0NE',ERR=N) 

LUN is the logical unit number associated with the file, FLNM is an array 
containing the file name for the output file with an explicit version number, 
and N is a statement number to go to if there is an error in opening the file. 

The arrays to accept the data should be dimensioned as follows: 

DIMENSION IREC1(16),IREC2(3,100),IREC3{2,10),IREC4(24,100), 

* IREC5(3,100) 

To load the data into the arrays the following statements can be used: 

READ(LUN)(IREC1(I),I=1,16) 

READ(LUN)((IREC2(I,J),I=1,3),J=1,IREC1(13)) 

READ(LUN)((IREC3(I,J),I=1 ,2),J=1 ,IREC1 (14)) 
READ(LUN)((IREC4(I,J),I=1,IREC1(15)+14),J=1 ,IREC1(12)) 

READ(LUN) ((IREC5(I,J), 1=1,3), J=1,IREC1 (11)) 
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In record 1, all of the words except word 2 are integers. Word 2 is an alpha- 
numeric variable (A2 format). Record 2 contains only integers. In record 3, 
the first word in each pair is alphanumeric (A1 format). In records 4 and 5, 
the words are all integers. To calculate the number of subpixels with a crop 
code from the data in record 4, the following statement should be used: 

NSBPX(J)=IREC4(2,J)*32768+IREC4(3,J) 
where NSBPX(J) must be an INTEGER*4 variable. 



3. DETAILS OF THE MODIFICATIONS 


Appendix B is a compiled listing of the routines used in the modified version 
of SPATL. The modifications made to the original program are marked off in 
blocks on the listings. SPATL uses the following routines: SPATL (main), 

CROPL, FILNAM, SUBSTR, TAB, and ZAP. The routines which were modified to 
produce the output file are SPATL, TAB, and ZAP. The modified version of 
SPATL requires 32,370 words of storage. 

3.1 SPATL (MAIN) MODIFICATIONS 

The arrays used to store the data are called IRECl , IREC2, IREC3, IREC4, and 
IREC5. All except IREC4 are dimensioned only in SPATL. IREC4 is in common 
block BKl . It is in common because IREC4 is loaded in the subroutine TAB. 

The logical unit number (LUN) for the output file is 7. The data in IRECl 
concerning the AI dots is obtained from th€ character data in the first AI 
dot record. 

3.2 TAB MODIFICATIONS 

The calling argument FLG was given a third value (3) to correspond to the AI 
dots. An additional argument, LCD, is used to store the number of ground 
truth crop codes in the segment. 

3.3 ZAP MODIFICATIONS 


The only modification to ZAP was the addition of IREC4 to the common statement. 



APPENDIX A 

DISK OUTPUT FILE FORMAT FOR SPATL 
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APPENDIX A 


DISK OUTPUT FILE FORMAT FOR SPATL 

Record 1 - Gteneral information 
WDl -- Segment number 

WD2 - State 

WD3 - Processing date for analyst labeled dots 

WD4 - Base acquisition date (1) 

WD5 - Previous acquisition date (2) 

WD6 - Previous acquisition date (3) 

WD7 - Previous acquisition date (4) 

WD8 - Date for ground truth tape (GTT) 

WD9 - Dot type 

WDIO - Number of labeled dots 

WDll - Number of mixed pixel labeled dots 

WDl 2 - Number of crop codes on ground truth tape 

WDl 3 - Number of crop code transformations 

WDl 4 - Number of dot label transformations 

WDl 5 - Largest AI dot output code 

WDl 6 - Not used 

Record 2 - Crop code transformations 
WD(1,N) - Beginning crop code 
WD{2,N) - Ending crop code 
WD(3,N) - Transformation 

Record 3 - Dot label transformations 
WD(1,N) -Alphanumeric label designation 
WD(2,N) - Numberic code 

Record 4 - Totals for each crop code 
WD(1,N) - Crop code (CC) 

WD(2,N) - High order bits! Number of subpixels 
WD(3,N) - Low order bits ( with crop code 
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W0(4,N) 

WD(5,N) 

WD(6.N) 

WD(7,N) 

WD(8,N) 

WD(9,N) 

WD(IO.N) 

WD(11,N) 

WD(12,N) 

WD(13,N) 

WD(14.N) 

WD(15,N) 

WD{16,N) 

* 

WD(U+n, 

Record 5 
WD(1,N) 
WD(2.N) 
WD(3,N) 


- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 

- Number of 


pixels with one subpixel of CC on GTT 
pixels with two subpixels of CC on GTT 
pixels with three subpixels of CC on GTT 
pixels with four subpixels of CC on GTT 
pixels with five subpixels of CC on GTT 
pixels with six subpixels of CC on GTT 
209 dots with CC cn GTT 
209 dots with three subpixels of CC on GTT 
209 dots with four subpixels of CC on GTT 
209 dots with five subpixels of CC on GTT 
209 docs with six subpixels of CC on GTT 
dots labeled "1" by analyst with CC 
dots labeled "2" by analyst with CC 


— Number of dots labeled "n" by analyst with CC 


Labeling accuracy for each mixed pixel labeled dot 
Crop code for mixed pixel labeled dot 
Number of subpixels in labeled dot with crop code 
Analyst label for dot 
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APPENDIX B 


PROGRAM LISTINGS 
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